// .txt

beginzonescript;

variables;

short crime_tolerance = 5;
short last_abil;
short i;

body;

beginstate INIT_STATE;
	set_aggression(8,8);
	set_aggression(9,8);
	set_aggression(10,8);
	set_aggression(11,8);
	
	set_name(12,"Pulsating Worm");
	set_name(17,"Pulsating Worm");
	set_name(22,"Pulsating Worm");
	set_name(27,"Pulsating Worm");
	set_name(32,"Pulsating Worm");
	set_boss_level(12,-1);
	set_boss_level(17,-1);
	set_boss_level(22,-1);
	set_boss_level(27,-1);
	set_boss_level(32,-1);
	
	set_name(37,"Mire Worm");
	set_boss_level(37,2);
	
	set_name(45,"Clawbug Queen");
	set_level(45,13);
	set_boss_level(45,1);
	set_name(46,"Clawbug Queen");
	set_level(46,13);
	set_boss_level(46,1);

	set_aggression(52,8);
	set_aggression(53,8);
	set_aggression(54,8);
	set_aggression(55,8);

	add_range_to_group(56,63,1);
	add_range_to_group(64,71,2);
	add_range_to_group(72,77,3);
	
	if (gf(16,6) > 0) {
		set_terrain(29,34,13);
		set_terrain(30,34,15);
		set_attitude(1003,10);
		set_act_at_dist(1003,1);
		}

	add_range_to_group(78,84,4);
	if (gf(16,3) > 0)
		erase_char(1004);


	//if (get_sdf() > 0) {
		//make_zone_hostile();
		//}

	last_abil = get_current_tick();
	
	set_crime_tolerance(crime_tolerance);
	break;

beginstate EXIT_STATE;

break;

beginstate START_STATE;
	// clear zone?
	if ((zone_clear(ME) == FALSE) && (get_flag(16,7) > 0)) {
		print_str_color("Now that you have reached the pass, you can pass this area safely.",2);
		clear_zone(ME);	
		}
		
	if ((get_crime_level() >= crime_tolerance) && (get_sdf(16,4) == 0)) {
		make_zone_hostile();
		set_flag(16,4,1);
		}

	if ((gf(16,4) == 0) && (gf(16,3) == 0)) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(78,"Be calm!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(78,"Quiet!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(78,"Don't eat that!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(78,"Can you help me?");
		if (get_ran(1,0,100) < 5)
			give_char_text_bubble(79 + get_ran(1,0,2),"Rrrr.");
		if (get_ran(1,0,100) < 5)
			give_char_text_bubble(79 + get_ran(1,0,2),"Rrr?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(82 + get_ran(1,0,2),"Arrrrgh.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(82 + get_ran(1,0,2),"Hruhhhh.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(82 + get_ran(1,0,2),"Ghhhah.");
		}
	
	//if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_group()) && (tick_difference(last_abil,get_current_tick()) > 5))) {
	//	last_abil = get_current_tick();
	//	}
break;

beginstate 10;
	sf(16,7,1);
break;

//	print_str("");
//	set_terrain_string_range(".",3);
//	set_terrain_string_range("The sign says - .",3);
